(Fdefalias): Record in load-history redefining an autoload.

diff --git a/src/data.c b/src/data.c
index c8867ef3cd76d6487d9f5063686136e80e273485..bde8ec3c83175173ba1216f9aa506f5deed6cdb7 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -715,6 +715,9 @@ determined by DEFINITION.  */)
      (symbol, definition, docstring)
      register Lisp_Object symbol, definition, docstring;
 {
+  if (CONSP (XSYMBOL (symbol)->function)
+      && EQ (XCAR (XSYMBOL (symbol)->function), Qautoload))
+    LOADHIST_ATTACH (Fcons (Qt, symbol));
   definition = Ffset (symbol, definition);
   LOADHIST_ATTACH (symbol);
   if (!NILP (docstring))